# Copyright (C) 2014  Alex Schroeder <alex@gnu.org>
#
# This program is free software: you can redistribute it and/or modify it under
# the terms of the GNU General Public License as published by the Free Software
# Foundation, either version 3 of the License, or (at your option) any later
# version.
#
# This program is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along with
# this program. If not, see <http://www.gnu.org/licenses/>.

use strict;
use v5.10;

AddModuleDescription('smiles.pl', 'Smilies');

our (%Smilies);

# The smilies are from the Emacs 24 distribution. There, you'll find
# them in the etc/images/smilies/medium directory.

# Files: blink.xpm braindamaged.xpm cry.xpm dead.xpm evil.xpm forced.xpm
#        frown.xpm grin.xpm indifferent.xpm reverse-smile.xpm sad.xpm
#        smile.xpm wry.xpm
# Author: Adam Sjøgren
# Copyright (C) 2007-2013 Free Software Foundation, Inc.
# License: GNU General Public License version 3 or later (see COPYING)

%Smilies = (
  # blink
  quotemeta(';-)') => '',
  # braindamaged
  quotemeta('8-)') => '',
  # cry
  quotemeta(':\'(') => '',
  # dead
  quotemeta('X-(') => '',
  # evil
  quotemeta('>-{') => '',
  # forced
  quotemeta(':-]') => '',
  # frown
  quotemeta('>-(') => '',
  # grin
  quotemeta(':-D') => '',
  # indifferent
  quotemeta(':-|') => '',
  # reverse-smile
  quotemeta('(-:') => '',
  # sad
  quotemeta(':-(') => '',
  # smile
  quotemeta(':-)') => '',
  # wry
  quotemeta(':-/') => '',
  # upside down
  quotemeta('(-:') => '',
    );
